home *** CD-ROM | disk | FTP | other *** search
- $! KITINSTAL.COM - for VMS Kermit-32
- $!
- $ On Control_Y Then Vmi$Callback CONTROL_Y
- $ On Warning Then Exit $Status
- $ If P1 .eqs. "VMI$_INSTALL" then goto Install
- $ Exit Vmi$_unsupported
- $
- $ Install:
- $ Type Sys$Input
-
- +-----------------------------------------------------------------------+
- | This installation will create KERMIT.DOC in SYS$HELP. |
- | Kermit should be initiated using the foreign command protocol. |
- | Place the following command in the system login command procedure: |
- | |
- | $ Kerm*it :== $KERMIT |
- +-----------------------------------------------------------------------+
-
- $ Vmi$Callback SET PURGE yes
- $ Vmi$Callback SET IVP no
- $
- $ Vmi$Callback PROVIDE_IMAGE Exe$ KERMIT.EXE Vmi$Root:[SysExe]
- $ Vmi$Callback PROVIDE_FILE Hlb$ KERMIT.HLB Vmi$Root:[SysHlp]
- $ Vmi$Callback PROVIDE_DCL_HELP KERMIT_SYS.HLP
- $ Vmi$Callback PROVIDE_FILE Hlb$ KERMIT.DOC Vmi$Root:[SysHlp]
- $ Vmi$Callback PROVIDE_DCL_COMMAND KERMIT.CLD
- $
- $ Exit Vmi$_success
-